package com.jieao.template.common.util;

import cn.hutool.core.net.NetUtil;
import lombok.extern.slf4j.Slf4j;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.dao.DataAccessException;
import org.springframework.data.redis.connection.RedisConnection;
import org.springframework.data.redis.connection.RedisStringCommands;
import org.springframework.data.redis.core.RedisCallback;
import org.springframework.data.redis.core.RedisTemplate;
import org.springframework.data.redis.core.ZSetOperations;
import org.springframework.data.redis.core.types.Expiration;
import org.springframework.stereotype.Component;
import org.springframework.util.CollectionUtils;
import redis.clients.jedis.Jedis;
import redis.clients.jedis.JedisCluster;

import java.util.ArrayList;
import java.util.List;
import java.util.Map;
import java.util.Set;
import java.util.concurrent.TimeUnit;

/**
 * @author Jzw
 * @className RedisUtils
 * @date 2020-01-01 14:00
 */
@Slf4j
@Component
public class RedisUtils
{
    @Autowired
    private RedisTemplate redisTemplate;


    /**
     * 指定缓存失效时间
     *
     * @param key  键
     * @param time 时间(秒)
     * @return
     */
    public boolean expire(String key, long time)
    {
        try
        {
            if (time > 0)
            {
                redisTemplate.expire(key, time, TimeUnit.SECONDS);
            }
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils expire(String key,long time) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 根据key 获取过期时间
     *
     * @param key 键 不能为null
     * @return 时间(秒) 返回0代表为永久有效
     */
    public long getExpire(String key)
    {
        return redisTemplate.getExpire(key, TimeUnit.SECONDS);
    }

    /**
     * 判断key是否存在
     *
     * @param key 键
     * @return true 存在 false不存在
     */
    public boolean hasKey(String key)
    {
        try
        {
            return redisTemplate.hasKey(key);
        } catch (Exception e)
        {
            log.error("RedisUtils hasKey(String key) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 删除缓存
     *
     * @param key 可以传一个值 或多个
     */
    @SuppressWarnings("unchecked")
    public void del(String... key)
    {
        if (key != null && key.length > 0)
        {
            if (key.length == 1)
            {
                redisTemplate.delete(key[0]);
            }
            else
            {
                redisTemplate.delete(CollectionUtils.arrayToList(key));
            }
        }
    }

    /**
     * 普通缓存获取
     *
     * @param key 键
     * @return 值
     */
    public Object get(String key)
    {
        return key == null ? null : redisTemplate.opsForValue().get(key);
    }

    /**
     * 普通缓存放入
     *
     * @param key   键
     * @param value 值
     * @return true成功 false失败
     */
    public boolean set(String key, Object value)
    {
        try
        {
            redisTemplate.opsForValue().set(key, value);
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils set(String key,Object value) failure." + e.getMessage());
            return false;
        }

    }

    /**
     * 普通缓存放入并设置时间
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒) time要大于0 如果time小于等于0 将设置无限期
     * @return true成功 false 失败
     */
    public boolean set(String key, Object value, long time)
    {
        try
        {
            if (time > 0)
            {
                redisTemplate.opsForValue().set(key, value, time, TimeUnit.SECONDS);
            }
            else
            {
                set(key, value);
            }
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils set(String key,Object value,long time) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 递增
     *
     * @param key   键
     * @param delta
     * @return
     */
    public long incr(String key, long delta)
    {
        if (delta < 0)
        {
            throw new RuntimeException("递增因子必须大于0");
        }
        return redisTemplate.opsForValue().increment(key, delta);
    }

    /**
     * 递减
     *
     * @param key   键
     * @param delta 要减少几(小于0)
     * @return
     */
    public long decr(String key, long delta)
    {
        if (delta < 0)
        {
            throw new RuntimeException("递减因子必须大于0");
        }
        return redisTemplate.opsForValue().increment(key, -delta);
    }

    /**
     * HashGet
     *
     * @param key  键 不能为null
     * @param item 项 不能为null
     * @return 值
     */
    public Object hGet(String key, String item)
    {
        return redisTemplate.opsForHash().get(key, item);
    }

    /**
     * 获取hashKey对应的所有键值
     *
     * @param key 键
     * @return 对应的多个键值
     */
    public Map hmGet(String key)
    {
        return redisTemplate.opsForHash().entries(key);
    }

    /**
     * HashSet
     *
     * @param key 键
     * @param map 对应多个键值
     * @return true 成功 false 失败
     */
    public boolean hmset(String key, Map<String, Object> map)
    {
        try
        {
            redisTemplate.opsForHash().putAll(key, map);
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils hmset(String key, Map<String,Object> map) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * HashSet 并设置时间
     *
     * @param key  键
     * @param map  对应多个键值
     * @param time 时间(秒)
     * @return true成功 false失败
     */
    public boolean hmset(String key, Map<String, Object> map, long time)
    {
        try
        {
            redisTemplate.opsForHash().putAll(key, map);
            if (time > 0)
            {
                expire(key, time);
            }
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils hmset(String key, Map<String,Object> map, long time) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 向一张hash表中放入数据,如果不存在将创建
     *
     * @param key   键
     * @param item  项
     * @param value 值
     * @return true 成功 false失败
     */
    public boolean hset(String key, String item, Object value)
    {
        try
        {
            redisTemplate.opsForHash().put(key, item, value);
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils hset(String key,String item,Object value) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 向一张hash表中放入数据,如果不存在将创建
     *
     * @param key   键
     * @param item  项
     * @param value 值
     * @param time  时间(秒)  注意:如果已存在的hash表有时间,这里将会替换原有的时间
     * @return true 成功 false失败
     */
    public boolean hset(String key, String item, Object value, long time)
    {
        try
        {
            redisTemplate.opsForHash().put(key, item, value);
            if (time > 0)
            {
                expire(key, time);
            }
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils hset(String key,String item,Object value,long time) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 删除hash表中的值
     *
     * @param key  键 不能为null
     * @param item 项 可以使多个 不能为null
     */
    public void hdel(String key, Object... item)
    {
        redisTemplate.opsForHash().delete(key, item);
    }

    /**
     * 判断hash表中是否有该项的值
     *
     * @param key  键 不能为null
     * @param item 项 不能为null
     * @return true 存在 false不存在
     */
    public boolean hHasKey(String key, String item)
    {
        return redisTemplate.opsForHash().hasKey(key, item);
    }

    /**
     * hash递增 如果不存在,就会创建一个 并把新增后的值返回
     *
     * @param key  键
     * @param item 项
     * @param by   要增加几(大于0)
     * @return
     */
    public double hincr(String key, String item, double by)
    {
        return redisTemplate.opsForHash().increment(key, item, by);
    }

    /**
     * hash递减
     *
     * @param key  键
     * @param item 项
     * @param by   要减少记(小于0)
     * @return
     */
    public double hdecr(String key, String item, double by)
    {
        return redisTemplate.opsForHash().increment(key, item, -by);
    }

    /**
     * 根据key获取Set中的所有值
     *
     * @param key 键
     * @return
     */
    public Set<Object> sGet(String key)
    {
        try
        {
            return redisTemplate.opsForSet().members(key);
        } catch (Exception e)
        {
            log.error("RedisUtils sGet(String key) failure." + e.getMessage());
            return null;
        }
    }

    /**
     * 根据value从一个set中查询,是否存在
     *
     * @param key   键
     * @param value 值
     * @return true 存在 false不存在
     */
    public boolean sHasKey(String key, Object value)
    {
        try
        {
            return redisTemplate.opsForSet().isMember(key, value);
        } catch (Exception e)
        {
            log.error("RedisUtils sHasKey(String key,Object value) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 将数据放入set缓存
     *
     * @param key    键
     * @param values 值 可以是多个
     * @return 成功个数
     */
    public long sSet(String key, Object... values)
    {
        try
        {
            return redisTemplate.opsForSet().add(key, values);
        } catch (Exception e)
        {
            log.error("RedisUtils sSet(String key, Object...values) failure." + e.getMessage());
            return 0;
        }
    }

    /**
     * 将set数据放入缓存
     *
     * @param key    键
     * @param time   时间(秒)
     * @param values 值 可以是多个
     * @return 成功个数
     */
    public long sSetAndTime(String key, long time, Object... values)
    {
        try
        {
            Long count = redisTemplate.opsForSet().add(key, values);
            if (time > 0)
            {
                expire(key, time);
            }
            return count;
        } catch (Exception e)
        {
            log.error("RedisUtils sSetAndTime(String key,long time,Object...values) failure." + e.getMessage());
            return 0;
        }
    }

    /**
     * 获取set缓存的长度
     *
     * @param key 键
     * @return
     */
    public long sGetSetSize(String key)
    {
        try
        {
            return redisTemplate.opsForSet().size(key);
        } catch (Exception e)
        {
            log.error("RedisUtils sGetSetSize(String key) failure." + e.getMessage());
            return 0;
        }
    }

    /**
     * 移除值为value的
     *
     * @param key    键
     * @param values 值 可以是多个
     * @return 移除的个数
     */
    public long setRemove(String key, Object... values)
    {
        try
        {
            Long count = redisTemplate.opsForSet().remove(key, values);
            return count;
        } catch (Exception e)
        {
            log.error("RedisUtils setRemove(String key, Object ...values) failure." + e.getMessage());
            return 0;
        }
    }

    /**
     * 获取list缓存的内容
     *
     * @param key   键
     * @param start 开始
     * @param end   结束  0 到 -1代表所有值
     * @return
     */
    public List<Object> lGet(String key, long start, long end)
    {
        try
        {
            return redisTemplate.opsForList().range(key, start, end);
        } catch (Exception e)
        {
            log.error("RedisUtils lGet(String key, long start, long end) failure." + e.getMessage());
            return null;
        }
    }

    /**
     * 获取list缓存的长度
     *
     * @param key 键
     * @return
     */
    public long lGetListSize(String key)
    {
        try
        {
            return redisTemplate.opsForList().size(key);
        } catch (Exception e)
        {
            log.error("RedisUtils lGetListSize(String key) failure." + e.getMessage());
            return 0;
        }
    }

    /**
     * 通过索引 获取list中的值
     *
     * @param key   键
     * @param index 索引  index>=0时， 0 表头，1 第二个元素，依次类推；index<0时，-1，表尾，-2倒数第二个元素，依次类推
     * @return
     */
    public Object lGetIndex(String key, long index)
    {
        try
        {
            return redisTemplate.opsForList().index(key, index);
        } catch (Exception e)
        {
            log.error("RedisUtils lGetIndex(String key,long index) failure." + e.getMessage());
            return null;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @return
     */
    public boolean lSet(String key, Object value)
    {
        try
        {
            redisTemplate.opsForList().rightPush(key, value);
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils lSet(String key, Object value) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒)
     * @return
     */
    public boolean lSet(String key, Object value, long time)
    {
        try
        {
            redisTemplate.opsForList().rightPush(key, value);
            if (time > 0)
            {
                expire(key, time);
            }
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils lSet(String key, Object value, long time) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @return
     */
    public boolean lSet(String key, List<Object> value)
    {
        try
        {
            redisTemplate.opsForList().rightPushAll(key, value);
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils lSet(String key, List<Object> value) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒)
     * @return
     */
    public boolean lSet(String key, List<Object> value, long time)
    {
        try
        {
            redisTemplate.opsForList().rightPushAll(key, value);
            if (time > 0)
            {
                expire(key, time);
            }
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils lSet(String key, List<Object> value, long time) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 根据索引修改list中的某条数据
     *
     * @param key   键
     * @param index 索引
     * @param value 值
     * @return
     */
    public boolean lUpdateIndex(String key, long index, Object value)
    {
        try
        {
            redisTemplate.opsForList().set(key, index, value);
            return true;
        } catch (Exception e)
        {
            log.error("RedisUtils lUpdateIndex(String key, long index,Object value) failure." + e.getMessage());
            return false;
        }
    }

    /**
     * 移除N个值为value
     *
     * @param key   键
     * @param count 移除多少个
     * @param value 值
     * @return 移除的个数
     */
    public long lRemove(String key, long count, Object value)
    {
        try
        {
            Long remove = redisTemplate.opsForList().remove(key, count, value);
            return remove;
        } catch (Exception e)
        {
            log.error("RedisUtils lRemove(String key,long count,Object value) failure." + e.getMessage());
            return 0;
        }
    }

    /**
     * 有序集合添加 zset
     *
     * @param key    键
     * @param value  值
     * @param scoure 排序
     */
    public void zAdd(String key, Object value, double scoure)
    {
        ZSetOperations<String, Object> zset = redisTemplate.opsForZSet();
        zset.add(key, value, scoure);
    }

    /**
     * 元素分数增加，scoure是增量
     *
     * @param key    键
     * @param value  值
     * @param scoure 增量
     */
    public void incrementScore(String key, Object value, double scoure)
    {
        ZSetOperations<String, Object> zset = redisTemplate.opsForZSet();
        zset.incrementScore(key, value, scoure);
    }

    /**
     * 使用键值从排序集中获取分数
     *
     * @param key   集合名称
     * @param value 值
     */
    public Double zScore(String key, Object value)
    {
        ZSetOperations<String, Object> zset = redisTemplate.opsForZSet();
        return zset.score(key, value);
    }

    /**
     * 获取元素在 集合中正序的索引
     *
     * @param key   集合名称
     * @param value 值
     */
    public Long zRank(String key, Object value)
    {
        ZSetOperations<String, Object> zset = redisTemplate.opsForZSet();
        return zset.rank(key, value);
    }

    /**
     * 获取元素在 集合中倒序的索引
     *
     * @param key   集合名称
     * @param value 值
     */
    public Long zReverseRank(String key, Object value)
    {
        ZSetOperations<String, Object> zset = redisTemplate.opsForZSet();
        return zset.reverseRank(key, value);
    }

    /**
     * 通过分数区间获取正序的  value集合
     *
     * @param key     集合名称
     * @param scoure  分数最小值 为负数无下限
     * @param scoure1 分数最大值 为负数无上限
     */
    public Set<Object> zRangeByScore(String key, double scoure, double scoure1)
    {
        ZSetOperations<String, Object> zset = redisTemplate.opsForZSet();
        return zset.rangeByScore(key, scoure, scoure1);
    }

    /**
     * 通过分数区间获取倒序的  value集合
     *
     * @param key     集合名称
     * @param scoure  分数最小值 为负数无下限
     * @param scoure1 分数最大值 为负数无上限
     */
    public Set<Object> rangeByScore(String key, double scoure, double scoure1)
    {
        ZSetOperations<String, Object> zset = redisTemplate.opsForZSet();
        return zset.reverseRangeByScore(key, scoure, scoure1);
    }

    /**
     * 通过索引区间返回有序集合成指定区间内的成员对象，其中有序集成员按分数值递增(从小到大)顺序排列
     * Set<ZSetOperations.TypedTuple<Object>> tuples = redisTemplate.rangeWithScores("zset1",0,-1);
     * Iterator<ZSetOperations.TypedTuple<Object>> iterator = tuples.iterator();
     * while (iterator.hasNext())
     * {
     * ZSetOperations.TypedTuple<Object> typedTuple = iterator.next();
     * System.out.println("value:" + typedTuple.getValue() + "score:" + typedTuple.getScore());
     * }
     *
     * @param key   集合名称
     * @param start 索引最小值 为负数无下限
     * @param end   索引最大值 为负数无上限
     */
    public Set<ZSetOperations.TypedTuple<Object>> zRankWithScore(String key, long start, long end)
    {
        ZSetOperations<String, Object> zset = redisTemplate.opsForZSet();
        return zset.rangeWithScores(key, start, end);
    }

    /**
     * 通过索引区间 从开始(start)到结束(end)，从排序从高到低的排序集中获取元组的集合
     *
     * @param key   集合名称
     * @param start 索引最小值 为负数无下限
     * @param end   索引最大值 为负数无上限
     */
    public Set<ZSetOperations.TypedTuple<Object>> reverseZRankWithRank(String key, long start, long end)
    {
        ZSetOperations<String, Object> zset = redisTemplate.opsForZSet();
        return zset.reverseRangeWithScores(key, start, end);
    }

    /**
     * 从开始到结束的范围内获取元素，其中分数在最小和最大之间，从排序集排序高 - >低
     *
     * @param key   集合名称
     * @param start 分数最小值 为负数无下限
     * @param end   分数最大值 为负数无上限
     */
    public Set<ZSetOperations.TypedTuple<Object>> reverseZRankWithScore(String key, long start, long end)
    {
        ZSetOperations<String, Object> zset = redisTemplate.opsForZSet();
        return zset.reverseRangeByScoreWithScores(key, start, end);
    }

    /**
     * 从开始到结束的范围内获取元素，其中分数在最小和最大之间，从排序集排序 低- > 高
     *
     * @param key   集合名称
     * @param start 分数最小值 为负数无下限
     * @param end   分数最大值 为负数无上限
     */
    public Set<ZSetOperations.TypedTuple<Object>> ZRankWithScore(String key, long start, long end)
    {
        ZSetOperations<String, Object> zset = redisTemplate.opsForZSet();
        return zset.rangeByScoreWithScores(key, start, end);
    }

    /**
     * 加锁
     *
     * @param key    键
     * @param expire 过期时间 秒
     * @return
     */
    public boolean setLock(String key, long expire)
    {
        try
        {
            Boolean result = (Boolean) redisTemplate.execute(new RedisCallback<Boolean>()
            {
                @Override
                public Boolean doInRedis(RedisConnection connection) throws DataAccessException
                {
                    return connection.set(key.getBytes(), NetUtil.getLocalhostStr().getBytes(), Expiration.seconds(expire),
                            RedisStringCommands.SetOption.ifAbsent());
                }
            });
            return result;
        } catch (Exception e)
        {
            log.error("set redis occured an exception", e);
        }
        return false;
    }

    public static final String UNLOCK_LUA;

    static
    {
        StringBuilder sb = new StringBuilder();
        sb.append("if redis.call(\"get\",KEYS[1]) == ARGV[1] ");
        sb.append("then ");
        sb.append("    return redis.call(\"del\",KEYS[1]) ");
        sb.append("else ");
        sb.append("    return 0 ");
        sb.append("end ");
        UNLOCK_LUA = sb.toString();
    }

    /**
     * 释放锁操作
     *
     * @param key       键
     * @param requestId ip地址
     * @return
     */
    public boolean releaseLock(String key, String requestId)
    {
        // 释放锁的时候，有可能因为持锁之后方法执行时间大于锁的有效期，此时有可能已经被另外一个线程持有锁，所以不能直接删除
        try
        {
            List<String> keys = new ArrayList<>();
            keys.add(key);
            List<String> args = new ArrayList<>();
            args.add(requestId);

            // 使用lua脚本删除redis中匹配value的key，可以避免由于方法执行时间过长而redis锁自动过期失效的时候误删其他线程的锁
            // spring自带的执行脚本方法中，集群模式直接抛出不支持执行脚本的异常，所以只能拿到原redis的connection来执行脚本
            RedisCallback<Long> callback = (connection) -> {
                Object nativeConnection = connection.getNativeConnection();
                // 集群模式和单机模式虽然执行脚本的方法一样，但是没有共同的接口，所以只能分开执行
                // 集群模式
                if (nativeConnection instanceof JedisCluster)
                {
                    return (Long) ((JedisCluster) nativeConnection).eval(UNLOCK_LUA, keys, args);
                }

                // 单机模式
                else if (nativeConnection instanceof Jedis)
                {
                    return (Long) ((Jedis) nativeConnection).eval(UNLOCK_LUA, keys, args);
                }
                return 0L;
            };
            Long result = (Long) redisTemplate.execute(callback);

            return result != null && result > 0;
        } catch (Exception e)
        {
            log.error("release lock occured an exception", e);
        } finally
        {
            // 清除掉ThreadLocal中的数据，避免内存溢出
            //lockFlag.remove();
        }
        return false;
    }
}
